Visual Basic Controls/Visual Basic Controls.iso/vbcontrol/sysinfo/SYSINFO5.FRM

Text File | 1999-01-25 | 19KB | 585 lines

VERSION 5.00
Object = "{6E3BBBCF-5A0D-11D1-B659-0060976C699F}#1.1#0"; "MSysInfo.ocx"
Begin VB.Form Form1
   Caption         =   "Mabry System Information Control Sample"
   ClientHeight    =   6390
   ClientLeft      =   1125
   ClientTop       =   1485
   ClientWidth     =   10680
   LinkTopic       =   "Form1"
   LockControls    =   -1  'True
   PaletteMode     =   1  'UseZOrder
   ScaleHeight     =   6390
   ScaleWidth      =   10680
   Begin VB.Frame Frame4
      Caption         =   "Files:"
      Height          =   6255
      Left            =   6360
      TabIndex        =   38
      Top             =   0
      Width           =   4215
      Begin VB.FileListBox File1
         Height          =   1845
         Hidden          =   -1  'True
         Left            =   240
         System          =   -1  'True
         TabIndex        =   40
         Top             =   2040
         Width           =   3735
      End
      Begin VB.DirListBox Dir1
         Height          =   1605
         Left            =   240
         TabIndex        =   39
         Top             =   360
         Width           =   3735
      End
      Begin VB.Label lblIsSystem
         Height          =   255
         Left            =   1200
         TabIndex        =   56
         Top             =   5880
         Width           =   855
      End
      Begin VB.Label lblReadOnly
         Height          =   255
         Left            =   1200
         TabIndex        =   55
         Top             =   5640
         Width           =   855
      End
      Begin VB.Label lblArchived
         Height          =   255
         Left            =   1200
         TabIndex        =   54
         Top             =   5400
         Width           =   975
      End
      Begin VB.Label lblHidden
         Height          =   255
         Left            =   1200
         TabIndex        =   53
         Top             =   5160
         Width           =   855
      End
      Begin VB.Label lblSize
         Height          =   255
         Left            =   1200
         TabIndex        =   52
         Top             =   4920
         Width           =   1815
      End
      Begin VB.Label lblTime
         Height          =   255
         Left            =   1200
         TabIndex        =   51
         Top             =   4680
         Width           =   1815
      End
      Begin VB.Label lblDate
         Height          =   255
         Left            =   1200
         TabIndex        =   50
         Top             =   4440
         Width           =   1455
      End
      Begin VB.Label lblVersion
         Height          =   255
         Left            =   1200
         TabIndex        =   49
         Top             =   4200
         Width           =   2295
      End
      Begin VB.Label Label25
         Alignment       =   1  'Right Justify
         Caption         =   "IsSystem:"
         Height          =   255
         Left            =   120
         TabIndex        =   48
         Top             =   5880
         Width           =   975
      End
      Begin VB.Label Label24
         Alignment       =   1  'Right Justify
         Caption         =   "IsReadOnly:"
         Height          =   255
         Left            =   120
         TabIndex        =   47
         Top             =   5640
         Width           =   975
      End
      Begin VB.Label Label23
         Alignment       =   1  'Right Justify
         Caption         =   "IsArchived:"
         Height          =   255
         Left            =   120
         TabIndex        =   46
         Top             =   5400
         Width           =   975
      End
      Begin VB.Label Label22
         Alignment       =   1  'Right Justify
         Caption         =   "IsHidden:"
         Height          =   255
         Left            =   120
         TabIndex        =   45
         Top             =   5160
         Width           =   975
      End
      Begin VB.Label Label21
         Alignment       =   1  'Right Justify
         Caption         =   "Size:"
         Height          =   255
         Left            =   360
         TabIndex        =   44
         Top             =   4920
         Width           =   735
      End
      Begin VB.Label Label20
         Alignment       =   1  'Right Justify
         Caption         =   "Time:"
         Height          =   255
         Left            =   240
         TabIndex        =   43
         Top             =   4680
         Width           =   855
      End
      Begin VB.Label Label19
         Alignment       =   1  'Right Justify
         Caption         =   "Date:"
         Height          =   255
         Left            =   240
         TabIndex        =   42
         Top             =   4440
         Width           =   855
      End
      Begin VB.Label Label18
         Alignment       =   1  'Right Justify
         Caption         =   "Version:"
         Height          =   255
         Left            =   240
         TabIndex        =   41
         Top             =   4200
         Width           =   855
      End
   End
   Begin VB.Frame Frame3
      Caption         =   "Environment"
      Height          =   1935
      Left            =   120
      TabIndex        =   2
      Top             =   4320
      Width           =   6135
      Begin SystemInfoControl.MSysInfo MSysInfo1
         Left            =   480
         Top             =   480
         _ExtentX        =   847
         _ExtentY        =   847
      End
      Begin VB.Label lblOS
         Height          =   255
         Left            =   2160
         TabIndex        =   33
         Top             =   1560
         Width           =   3855
      End
      Begin VB.Label lblProcessorCount
         Height          =   255
         Left            =   2160
         TabIndex        =   32
         Top             =   1320
         Width           =   3855
      End
      Begin VB.Label lblProcessorType
         Height          =   255
         Left            =   2160
         TabIndex        =   31
         Top             =   1080
         Width           =   3855
      End
      Begin VB.Label lblTemp
         Height          =   255
         Left            =   2160
         TabIndex        =   30
         Top             =   720
         Width           =   3855
      End
      Begin VB.Label lblSystem
         Height          =   255
         Left            =   2160
         TabIndex        =   29
         Top             =   480
         Width           =   3855
      End
      Begin VB.Label lblWindows
         Height          =   255
         Left            =   2160
         TabIndex        =   28
         Top             =   240
         Width           =   3855
      End
      Begin VB.Label Label15
         Alignment       =   1  'Right Justify
         Caption         =   "Operating System:"
         Height          =   255
         Left            =   120
         TabIndex        =   17
         Top             =   1560
         Width           =   1935
      End
      Begin VB.Label Label14
         Alignment       =   1  'Right Justify
         Caption         =   "Processor Count:"
         Height          =   255
         Left            =   120
         TabIndex        =   16
         Top             =   1320
         Width           =   1935
      End
      Begin VB.Label Label13
         Alignment       =   1  'Right Justify
         Caption         =   "Processor Type:"
         Height          =   255
         Left            =   120
         TabIndex        =   15
         Top             =   1080
         Width           =   1935
      End
      Begin VB.Label Label12
         Alignment       =   1  'Right Justify
         Caption         =   "Temp:"
         Height          =   255
         Left            =   120
         TabIndex        =